function [transferenciaFinal]= transitional (transferencia1,transferencia2,factor)
    [~,p1,~]=zpkdata(transferencia1);
    [~,p2,~]=zpkdata(transferencia2);
    p1=cell2mat(p1);
    p2=cell2mat(p2);
    
    for j =1 :size(p1)
        p(j)= ((p1(j))^factor)*((p2(j))^(1-factor));
    end
    
    transferenciaFinal=tf(1,poly(p));
end